unit mail_msg;

interface
  uses mail_consts,Dialogs;

  procedure msgTest;
  procedure msgBadTest;
  procedure msgWrongSMTPPort;
  procedure msgWrongSavePWD;
  procedure msgWrongOnePerMail;
  procedure msgWrongEmail;
  procedure msgWrongHost;
  procedure msgWrongBDPath;

implementation

procedure msgTest();
begin
  ShowMessage(c_msgTest);
end;

procedure msgBadTest();
begin
  ShowMessage(c_msgBadTest);
end;

procedure msgWrongSMTPPort;
begin
  ShowMessage(c_msgWrongSMTPPort);
end;

procedure msgWrongSavePWD;
begin
  ShowMessage(c_msgWrongSavePWD);
end;

procedure msgWrongOnePerMail;
begin
  ShowMessage(c_msgWrongOnePerMail);
end;

procedure msgWrongEmail;
begin
  ShowMessage(c_msgWrongEmail);
end;

procedure msgWrongHost;
begin
  ShowMessage(c_msgWrongEmail);
end;

procedure msgWrongBDPath;
begin
  ShowMessage(c_msgWrongEmail);
end;
end.
